home *** CD-ROM | disk | FTP | other *** search
/ Virtual Sex Shoot / Virtual Sex Shoot.iso / mac / Virtual Sex Shoot / Virtual Sex Shoot.DXR / 00205.ls < prev    next >
Encoding:
Text File  |  1995-09-24  |  1.8 KB  |  24 lines
  1. global gVR.CopyrightNotice, gVR.PanoFilename, gVR.ObjectFilename, gVR.CurrentHotSpotID, gVR.CurrentNode, gVR.HPanAngle, gVR.VPanAngle, gVR.ZoomAngle, gVR.NodeID, gVR.Quality, gVR.MouseOverHandler.Message, gVR.RolloverHotSpotHandler.Message, gVR.MouseDownHandler.Message, gVR.PanZoomStartHandler.Message, gVR.MouseStillDownHandler.Message, gVR.NodeLeaveHandler.Message, gVR.NavHPanAngle, gVR.NavVPanAngle, gVR.CurrentNodeID
  2.  
  3. on reconcileText
  4.   set the text of cast "Copyright Notice" to string(gVR.CopyrightNotice)
  5.   set the text of cast "Pano Filename" to string(gVR.PanoFilename)
  6.   set the text of cast "Object Filename" to string(gVR.ObjectFilename)
  7.   set the text of cast "Current Hot Spot ID" to string(gVR.CurrentHotSpotID)
  8.   set the text of cast "Current Node ID" to string(gVR.CurrentNode)
  9.   set the text of cast "HPanAngle" to string(gVR.HPanAngle)
  10.   set the text of cast "VPanAngle" to string(gVR.VPanAngle)
  11.   set the text of cast "ZoomAngle" to string(gVR.ZoomAngle)
  12.   set the text of cast "Node ID" to string(gVR.NodeID)
  13.   set the text of cast "Quality" to string(gVR.Quality)
  14.   set the text of cast "MouseOverHandler Message" to string(gVR.MouseOverHandler.Message)
  15.   set the text of cast "RolloverHotSpotHandler Message" to string(gVR.RolloverHotSpotHandler.Message)
  16.   set the text of cast "MouseDownHandler Message" to string(gVR.MouseDownHandler.Message)
  17.   set the text of cast "PanZoomStartHandler Message" to string(gVR.PanZoomStartHandler.Message)
  18.   set the text of cast "MouseStillDownHandler Message" to string(gVR.MouseStillDownHandler.Message)
  19.   set the text of cast "NodeLeaveHandler Message" to string(gVR.NodeLeaveHandler.Message)
  20.   set the text of cast "Nav hPanAngle" to string(gVR.NavHPanAngle)
  21.   set the text of cast "Nav vPanAngle" to string(gVR.NavVPanAngle)
  22.   set the text of cast "Current Node ID" to string(gVR.CurrentNodeID)
  23. end
  24.